* ftfont.c (ftfont_list): Remove unused local.

diff --git a/src/ChangeLog b/src/ChangeLog
index 6ad69b657b865ff28048309dfd6067a348601f85..5ec2d88ea906ae9f370a6386a9e158ae0a151dd2 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,7 @@
        * ftfont.c (ftfont_resolve_generic_family): Fix pointer signedness.
        (ftfont_otf_capability, ftfont_shape): Omit decls if not needed.
        (OTF_TAG_SYM): Omit macro if not needed.
+       (ftfont_list): Remove unused local.
 
        * xfont.c (xfont_list_family): Mark var as initialized.
 

diff --git a/src/ftfont.c b/src/ftfont.c
index 5decec16825624182d0e4b2b4af458c4934ed609..28042bb9c669b914d267fbe1fd09ef0d3df577ec 100644 (file)
--- a/src/ftfont.c
+++ b/src/ftfont.c
@@ -871,7 +871,6 @@ ftfont_list (Lisp_Object frame, Lisp_Object spec)
   FcObjectSet *objset = NULL;
   FcCharSet *charset;
   Lisp_Object chars = Qnil;
-  FcResult result;
   char otlayout[15];           /* For "otlayout:XXXX" */
   struct OpenTypeSpec *otspec = NULL;
   int spacing = -1;